%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% If (Request.Form("Request_Submit") <> "") Then Dim strBody strBody = strBody & "First name: " & Request.Form("firstname") & vbCrLf strBody = strBody & "Last name: " & Request.Form("lastname") & vbCrLf strBody = strBody & "Email address: " & Request.Form("emailaddress") & vbCrLf strBody = strBody & "Phone number: " & Request.Form("phonenumber") & vbCrLf strBody = strBody & "Loan amount: " & Request.Form("loanamount") & vbCrLf strBody = strBody & "Appraised value: " & Request.Form("appraisedvalue") & vbCrLf strBody = strBody & "Loan type: " & Request.Form("loantype") & vbCrLf strBody = strBody & "Loan term: " & Request.Form("loanterm") & vbCrLf strBody = strBody & "Property address: " & Request.Form("propertyaddress") & vbCrLf strBody = strBody & "Property city: " & Request.Form("propertycity") & vbCrLf strBody = strBody & "Primary residence: " & Request.Form("primaryresidence") & vbCrLf & vbCrLf strBody = strBody & "Comments: " & Request.Form("comments") & vbCrLf SendEmail "john@john-schroeder.net", Request.Form("emailaddress"), "Loan request submitted!", strBody Response.Write("") End If %>
|
||||||||||||||||||||
|
John Schroeder Copyright ©2007. sarasota-bradenton-mortgages.com - Mortgage Sarasota |
||||||||||||||||||||